VERSION 4.00 Begin VB.Form frmReport Appearance = 0 'Flat BackColor = &H00C0C0C0& BorderStyle = 3 'Fixed Dialog ClientHeight = 4455 ClientLeft = 360 ClientTop = 1860 ClientWidth = 6480 BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "MS Sans Serif" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty ForeColor = &H80000008& Height = 4860 Left = 300 LinkTopic = "Form1" MaxButton = 0 'False MinButton = 0 'False ScaleHeight = 4455 ScaleWidth = 6480 Top = 1515 Width = 6600 Begin Threed.SSPanel pnlStndoc Height = 3390 Left = 180 TabIndex = 4 Top = 180 Width = 1950 _Version = 65536 _ExtentX = 3440 _ExtentY = 5980 _StockProps = 15 ForeColor = 4210752 BackColor = 8421376 BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "MS Sans Serif" Size = 8.25 Charset = 0 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty BevelOuter = 1 Begin VB.Image imgStnDoc Appearance = 0 'Flat Height = 3360 Left = 0 Picture = "REPORT.frx":0000 Top = 0 Width = 1920 End End Begin VB.CommandButton cmdCancel Appearance = 0 'Flat BackColor = &H80000005& Caption = "Cancel" BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "MS Sans Serif" Size = 8.25 Charset = 0 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 375 Left = 5160 TabIndex = 3 Top = 3960 Width = 1155 End Begin VB.CommandButton cmdNext Appearance = 0 'Flat BackColor = &H80000005& Caption = "Finish" Default = -1 'True BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "MS Sans Serif" Size = 8.25 Charset = 0 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 375 Left = 3840 TabIndex = 0 Top = 3960 Width = 1155 End Begin VB.CommandButton cmdBack Appearance = 0 'Flat BackColor = &H80000005& Caption = "< &Back" BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "MS Sans Serif" Size = 8.25 Charset = 0 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 375 Left = 2700 TabIndex = 2 Top = 3960 Width = 1155 End Begin VB.Line Line2 BorderColor = &H00FFFFFF& X1 = 180 X2 = 6300 Y1 = 3795 Y2 = 3795 End Begin VB.Label Label1 Appearance = 0 'Flat BackColor = &H80000005& BackStyle = 0 'Transparent Caption = "You've finished designing your report! Click the ""Finish"" button to produce your report. " BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "MS Sans Serif" Size = 8.25 Charset = 0 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty ForeColor = &H80000008& Height = 495 Left = 2280 TabIndex = 1 Top = 240 Width = 4095 End Attribute VB_Name = "frmReport" Attribute VB_Creatable = False Attribute VB_Exposed = False Option Explicit Private Sub Cancel_Click() End End Sub Private Sub cmdBack_Click() Hide frmSelectLook.Top = Top frmSelectLook.left = left frmSelectLook.Show End Sub Private Sub cmdCancel_Click() End End Sub Private Sub cmdNext_Click() Hide frmProgress.Top = Top frmProgress.left = left frmProgress.Show End Sub Private Sub First_Click() Hide frmSelectStencil.Show End Sub Private Sub Form_Load() ' Initialize the form. ' formInit frmReport ' Initialize the controls. ' 'btnNext.Enabled = False ' Center the picture imgStndoc.Top = pnlStndoc.Height / 2 - imgStndoc.Height / 2 imgStndoc.left = pnlStndoc.Width / 2 - imgStndoc.Width / 2 End Sub Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) End End Sub